CD World 1998 January/CD World - Ocak 1998.iso/disk/safescan/safescan.ex_/safescan.ex/0/RCDATA/TFRMREG/TFRMREG.txt

Text File | 1997-08-28 | 6KB | 272 lines

object frmReg: TfrmReg
  Left = 377
  Top = 232
  BorderStyle = bsDialog
  Caption = 'SafetyScan'
  ClientHeight = 254
  ClientWidth = 446
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 4
    Top = 4
    Width = 360
    Height = 39
    Caption =
      'This is an unregistered version for evaluation use only.  Please' +
      ' take the time to purchase and register this software so that we' +
      ' can continue to provide you with quality products.'
    WordWrap = True
  end
  object Image1: TImage
    Left = 385
    Top = 84
    Width = 57
    Height = 37
    Picture.Data = {<image001.bmp>}
  end
  object Image2: TImage
    Left = 385
    Top = 4
    Width = 57
    Height = 37
    Picture.Data = {<image002.bmp>}
  end
  object Image3: TImage
    Left = 385
    Top = 44
    Width = 57
    Height = 37
    Picture.Data = {<image003.bmp>}
  end
  object Label5: TLabel
    Left = 4
    Top = 48
    Width = 369
    Height = 32
    AutoSize = False
    Caption =
      'You may evaluate this software for 30 days or 30 instances, whic' +
      'hever comes first.  If you decide to keep it after that, you mus' +
      't contact Unisyn to register.'
    WordWrap = True
  end
  object Label14: TLabel
    Left = 3
    Top = 84
    Width = 363
    Height = 39
    Caption =
      'Web users can conveniently register SafetyScan by taking advanta' +
      'ge of our secure on-line ordering at www.unisyn.com.  Compuserve' +
      ' users can also easily register online: Go SWREG and use ID# 127' +
      '67'
    WordWrap = True
  end
  object UrlLabel1: TUrlLabel
    Left = 4
    Top = 132
    Width = 227
    Height = 16
    Cursor = 5
    Hint = 'Connect to Unisyn'#39's Secure Web Order Form'
    Caption = 'Click Here to Order SafetyScan Now!'
    Color = clRed
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold, fsItalic]
    ParentColor = False
    ParentFont = False
    URL = 'https://secure.other-world.com/ftp/unisyn-admin/orderform.htm'
  end
  object Label15: TLabel
    Left = 141
    Top = 177
    Width = 86
    Height = 13
    Caption = 'Instances Left:'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lblInst: TLabel
    Left = 229
    Top = 177
    Width = 15
    Height = 13
    Caption = '30'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label17: TLabel
    Left = 149
    Top = 153
    Width = 81
    Height = 19
    Caption = 'Only $29.95'
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
  end
  object btnAgree: TOfficeLabel
    Left = 5
    Top = 160
    Width = 101
    Height = 16
    Caption = 'Register Later'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = btnAgreeClick
  end
  object Button3: TOfficeLabel
    Left = 5
    Top = 180
    Width = 111
    Height = 21
    Caption = 'Register Now'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = Button3Click
  end
  object Button2: TOfficeLabel
    Left = 5
    Top = 200
    Width = 61
    Height = 16
    Caption = 'Exit'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = Button2Click
  end
  object Button1: TOfficeLabel
    Left = 5
    Top = 220
    Width = 131
    Height = 16
    Caption = 'Ordering Information'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = Button1Click
  end
  object GroupBox1: TGroupBox
    Left = 249
    Top = 124
    Width = 193
    Height = 125
    Caption = 'SafetyScan - Ordering Information'
    TabOrder = 0
    object Label2: TLabel
      Left = 88
      Top = 20
      Width = 69
      Height = 13
      Caption = '[phone]'
    end
    object Label3: TLabel
      Left = 88
      Top = 40
      Width = 69
      Height = 13
      Caption = '[phone]'
    end
    object Label8: TLabel
      Left = 88
      Top = 80
      Width = 57
      Height = 13
      Caption = '74667,3166'
    end
    object Label9: TLabel
      Left = 12
      Top = 20
      Width = 34
      Height = 13
      Caption = 'Phone:'
    end
    object Label10: TLabel
      Left = 12
      Top = 40
      Width = 33
      Height = 13
      Caption = 'FAX:'
    end
    object Label11: TLabel
      Left = 12
      Top = 60
      Width = 33
      Height = 13
      Caption = 'EMail:'
    end
    object Label12: TLabel
      Left = 12
      Top = 80
      Width = 64
      Height = 13
      Caption = 'CompuServe:'
    end
    object Label13: TLabel
      Left = 12
      Top = 100
      Width = 28
      Height = 13
      Alignment = taRightJustify
      Caption = 'WEB:'
    end
    object UrlLabel2: TUrlLabel
      Left = 88
      Top = 100
      Width = 80
      Height = 13
      Cursor = 5
      Caption = 'www.unisyn.com'
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsUnderline]
      ParentFont = False
      URL = 'http://www.unisyn.com/order'
    end
    object UrlLabel3: TUrlLabel
      Left = 89
      Top = 59
      Width = 92
      Height = 13
      Cursor = 5
      Caption = '[e-mail]'
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsUnderline]
      ParentFont = False
      URL = 'mailto:[e-mail]'
    end
  end
  object Timer2: TTimer
    Interval = 3000
    OnTimer = Timer2Timer
    Left = 175
    Top = 205
  end
end